home *** CD-ROM | disk | FTP | other *** search
- /*
- Author: Jerry LeVan
- 325 Boone Trail
- Richmond Ky 40475
- New File: May 1987
- */
- #include <packages.h>
-
- #include <dialogs.h>
-
- #define ERR_ID 128
-
- void ErrorMessage(msg,reason)
- char *msg; /* the reason */
- short reason; /* system error code (if not zero) */
- { char tmp[10]; /* storage for numeric conversion */
-
- if(reason ){
- NumToString(reason,tmp);
- ParamText(msg,"Reason:",tmp,nil);}
- else ParamText(msg," "," ",nil);
- StopAlert(ERR_ID,nil);
- }